﻿Imports System
Imports System.ComponentModel

Namespace System.Workflow.ComponentModel.Design
    Friend NotInheritable Class ReadonlyTypeDescriptonProvider
        Inherits TypeDescriptionProvider
        ' Methods
        Friend Sub New(ByVal realProvider As TypeDescriptionProvider)
            MyBase.New(realProvider)
        End Sub

        Public Overrides Function GetTypeDescriptor(ByVal type As Type, ByVal instance As Object) As ICustomTypeDescriptor
            Return New ReadonlyTypeDescriptor(MyBase.GetTypeDescriptor(type, instance))
        End Function

    End Class
End Namespace

